home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / SYMBOL / Symbol Processors / Transpose / symbol-transpose-chromatic next >
Encoding:
Text File  |  1998-10-23  |  338 b   |  12 lines  |  [TEXT/ScoM]
  1. symbol-transpose-chromatic value symbol-pattern
  2.  
  3. Transposes symbols in symbol-pattern up and down chromatically. 
  4.  
  5. (symbol-transpose-chromatic 1 '(-a b c))
  6. --> ((1 -a) (1 b) (1 c))
  7.  
  8. (symbol-transpose-chromatic 1 '(-a = (1 b c) c))
  9. --> ((1 -a) = (2 b 1 c) (1 c))
  10.  
  11. (symbol-transpose-chromatic 1 '(-a (1 b c) c))
  12. --> ((1 -a) (2 b 1 c) (1 c))